<%
youname1=trim(request("youname1"))
youname2=trim(request("youname2"))
youname=youname1&youname2
sex=trim(request("sex"))
nx=trim(request("nx"))
nian=trim(request("nian"))
yue=trim(request("yue"))
ri=trim(request("ri"))
hh=trim(request("hh"))
shi=trim(request("shi"))
xx=trim(request("xx"))
ns=trim(request("ns"))
ji=trim(request("ji"))
bj=trim(request("bj"))
xiong=trim(request("xiong"))
xn=trim(request("xn"))
zf=trim(request("zf"))
%>
<%
sex=trim(request("sex"))
if sex<>"" then
youname=trim(request("youname"))
nx=trim(request("nx"))
nian=trim(request("nian"))
yue=trim(request("yue"))
ri=trim(request("ri"))
shi=trim(request("shi"))
end if
%>
<%
if nian="" then nian=year(now())
if yue="" then yue=month(now())
if ri="" then ri=day(now())
nl=year(now())-nian+1
shi1=(hour(now())+.005)
if shi1>=1 and shi1<=3 then aishi= "丑时"
if shi1>=3 and shi1<=5 then aishi= "寅时"
if shi1>=5 and shi1<=7 then aishi= "卯时"
if shi1>=7 and shi1<=9 then aishi= "辰时"
if shi1>=9 and shi1<=11 then aishi= "巳时"
if shi1>=11 and shi1<=13 then aishi= "午时"
if shi1>=13 and shi1<=15 then aishi= "未时"
if shi1>=15 and shi1<=17 then aishi= "申时"
if shi1>=17 and shi1<=19 then aishi= "酉时"
if shi1>=19 and shi1<=21 then aishi= "戍时"
if shi1>=21 and shi1<=23 then aishi= "亥时"
if shi1>=23 or shi1<=1 then aishi= "子时"
'ainian=year(now())
if sex="男" then
ainian=nian+2
else
ainian=nian
end if
aiyue=month(now())
airi=day(now())
%>